<script language="javascript" type="text/ecmascript" src="js/form.js"></script>
<script language="javascript" src="js/prototype.js"></script>
<?PHP
session_start();
header("Content-Type: text/html; charset=iso-8859-1");
import_request_variables("gP");
include('conex.php');
include('funciones.php');
include('fechas.php');
// -------------------------------------------------------------------------

$pag = "rpt_pacientes_nuevos.php?orden=";

echo "<div id='reporte' align='center' class='nombres'>";
echo "<br><div align='center'>";
echo printhour();
echo "</div>";

echo "<b>LISTADO GENERAL DE PACIENTES INGRESADOS EL DIA DE HOY (".date("d/m/Y").")<br>$titular<b><br/>";
echo "<span class='datos'>(Para ordenar la tabla por otra columna, solo de click sobre el titulo de la columna)</span>";

	echo "<table width=750 align='center' class='datos cuadro2' ><TR bgcolor='#cccccc'>
<td rowspan='2'>No.</td>
	<td rowspan='2'><a href='#' onclick='liga(\"$pag hora desc,\",\"reporte\")'>REGISTRO PORTAL</td>
	<td rowspan='2'><a href='#' onclick='liga(\"$pag hora desc,\",\"reporte\")'>HORA PORTAL</td>	
	<td rowspan='2'><a href='#' onclick='liga(\"$pag a.nTipoPaciente,\",\"reporte\")'>TIPO PACIENTE<BR /> H y A</td>
	<td rowspan='2'><a href='#' onclick='liga(\"$pag ent.entidad,\",\"reporte\")'>ENTIDAD</a></TD>
	<td rowspan='2'><a href='#' onclick='liga(\"$pag unidad,\",\"reporte\")'>UNIDAD MEDICA</a></TD>
	<td rowspan='2'><a href='#' onclick='liga(\"$pag nombre,\",\"reporte\")'>NOMBRE DEL PACIENTE</a></TD>
	<TD rowspan='2'>SEXO</TD><TD rowspan='2'>EDAD</TD>";
	echo "<TD rowspan='2'><a href='#' onclick='liga(\"$pag fIngreso desc,\",\"reporte\")'>FECHA INGRESO O CONSULTA</a></TD>";
	if($tipoPaciente == " nTipoPaciente in (1)") {
		echo "<TD rowspan='2'><a href='#' onclick='liga(\"$pag fEgreso desc,\",\"reporte\")'>FECHA EGRESO</a></TD>";
		echo "<TD rowspan='2'>VACUNADO</TD>";
	}else{
		echo "<TD rowspan='2'><a href='#' onclick='liga(\"$pag fEgreso desc,\",\"reporte\")'>SE LE DIO <BR>TRATAMIENTO</a></TD>";
		echo "<TD rowspan='2'>VACUNADO</TD>";
	}
	echo "<TD colspan='2'>PRUEBA RAPIDA</TD>
	<TD colspan='3'>PRUEBAS DE LA MUESTRA</TD>
	<TD rowspan='2'><a href='#' onclick='liga(\"$pag e.evolucion,\",\"reporte\")'>EVOLUCION</a></TD>
	</TR>";

	echo "<TR bgcolor='#cccccc'>";
	// datos la prueba rapida	
	echo "<td><a href='#' onclick='liga(\"$pag pruebaRapida,\",\"reporte\")'>SE APLICO</a></td>";
	echo "<TD><a href='#' onclick='liga(\"$pag ResRapida,\",\"reporte\")'>RESULTADO</a></TD>";
	// datos de la prueba influenza tipo A
	echo "<TD><a href='#' onclick='liga(\"$pag a.fmuestra desc,\",\"reporte\")'>FECHA</TD>";
	echo "<TD><a href='#' onclick='liga(\"$pag resultado_muestra,\",\"reporte\")'>INFLUENZA TIPO A</a></TD>";
	echo "<TD><a href='#' onclick='liga(\"$pag resultado_muestra2,\",\"reporte\")'>INFLUENZA A H1N1</a></TD>";	
	echo "</TR>";	
	if(!isset($orden)) $orden = "fIngreso desc,";
	$hoy = date("Y-m-d");

	$sql = "SELECT left(fCreacion,10),right(fCreacion,8) as hora,
		case nTipoPaciente WHEN 1 THEN 'H' WHEN 2 THEN 'A' END as tipoPac,ent.nombre,concat(t.corto,' ',b.nombre) as unidad, 
		concat(a.cPaterno,' ',a.cMaterno,' ',a.cNombre) as nombre,
		CASE nSexo WHEN 1 THEN 'HOMBRE' ELSE ' MUJER' END AS 'sexo',
		(2009-nEdad) as Edad ,fIngreso,";
	if($tipoPaciente == " nTipoPaciente in (1)") {
		$sql .="fEgreso,";
	}else{
		$sql .="CASE nRecibioTratamiento WHEN 1 THEN 'SI' WHEN 2 THEN 'NO' ELSE '' END as trat, ";	
	}	
	$sql .="case nVacunado when 1 then 'SI' WHEN 0 THEN 'NO' END as vacunado,
		  CASE nPruebaRapida when 1 then 'SI' when  0 then 'NO' ELSE ''  end as 'PruebaRapida',
		  CASE nResRapida  when 1  then 'POSITIVO' WHEN 2 THEN 'NEGATIVO' ELSE '' end as' ResRapida',	
		  fmuestra, 
		  CASE WHEN nResultado_muestra = 1 AND nEstado_muestra = 1 THEN 'POSITIVO' 
		  WHEN nResultado_muestra = 1 AND nEstado_muestra = 2 THEN 'DISTINTO' 		  
		  when nResultado_muestra = 2 then 'NEGATIVO' 
		  WHEN nResultado_muestra = 0 AND nToma_muestra = 1 THEN 'EN ESTUDIO' END as resultado_muestra ,
		  CASE WHEN nResultado_muestra2 = 1 then 'POSITIVO' 
		  when nResultado_muestra2 = 2 then 'NEGATIVO' 
		  WHEN nResultado_muestra2 = 0 THEN '' END as resultado_muestra2,
		 CASE WHEN un.unidadRef IS NOT NULL AND a.nEvolucion = 7 THEN concat(e.evolucion,' (',un.unidadRef,')')  
			WHEN a.nEvolucion = 1 AND a.nSubevolucion > 0 THEN concat(e.evolucion,' POR ',s.descripcion) 
			ELSE e.evolucion END as evol,
			 b.id_unidad,a.id_principal
		FROM dat_registro a
		inner join catalogos.unidades b using (id_unidad)
		inner join catalogos.tipologia t using (id_tipologia)
		INNER JOIN catalogos.entidad ent on (b.id_entidad = ent.entidad)
		left join (select concat(t.corto,' ',a.nombre) as unidadRef,a.id_unidad from catalogos.unidades a 
			inner join catalogos.tipologia t using (id_tipologia)) un on (un.id_unidad = a.nUnidadReferir)		
		left join cat_diagnosticos dg on (dg.nTipo=1 and dg.id_diagnostico = a.nDiagnostico1)
		left join cat_evolucion e on (a.nEvolucion = e.id_evolucion)
		LEFT JOIN cat_subevolucion s on (a.nsubevolucion = s.id_principal)
		WHERE fCreacion >='$hoy' 
		order by $orden ent.entidad,t.orden";
//echo "<font size=1>$sql</font>";
$res = mysql_query($sql,$link) or die(mysql_error());
while($datos = mysql_fetch_array($res)){
	$color = $color=="#ffffff"?"#f3f3f3":"#ffffff";	
	$cnt++;
	echo "<tr bgcolor='$color'><td>$cnt</td>";
	$pagina = "cedulapaciente.php?id_principal=".$datos["id_principal"];
	$parametros = "scrollbars=yes,toolbar=no,location=no,status=no,menubar=no,resizable=yes,width=730,height=500";
	$pag = "";
	$liga = "";
	if ($_SESSION['id_usuario'] == 236) {
		$liga = "<a href='#' onclick='window.open(\"$pagina\",\"Cedula\",\"$parametros\")'>";
	}
	
	for($i=0;$i<17;$i++){
		if($i==5) $pag = $liga;
		if($i==0 or $i == 8 or $i == 13 ) {
			if ($datos[$i] < '20000101') {
				$datos[$i] = "";
			}else{	
				$datos[$i] = conviertefecha($datos[$i]);
			}
		}
		echo "<td>$pag".$datos[$i]."</a></td>";	
		$pag = "";
	}
}
echo "</tr></table>";

?>	